Skip to content

Commit

Permalink
Third Beta Release
Browse files Browse the repository at this point in the history
Fixed bug where you could scroll to images that didn't exist. Added support for more than 16 images.
  • Loading branch information
TheLastMillennial committed Aug 9, 2019
1 parent 2a0c45e commit 5a1270d
Show file tree
Hide file tree
Showing 12 changed files with 114 additions and 60 deletions.
Binary file removed Compiled Displayers/HDPICV beta 2.8xp
Binary file not shown.
Binary file added Compiled Displayers/HDPICV beta 3.8xp
Binary file not shown.
Binary file modified Example Images/Releases/ExampleL.8xv
Binary file not shown.
Binary file added Example Images/Releases/ExampleP.8xv
Binary file not shown.
Binary file modified Example Images/Releases/ExampleR.8xv
Binary file not shown.
Binary file modified HDpicConverter/HD Picture Converter CE.exe
Binary file not shown.
18 changes: 11 additions & 7 deletions HDpicConverter/convpng.ini
Original file line number Diff line number Diff line change
@@ -1,36 +1,40 @@
/Leave this alone
#GroupPalette : image_palette.png
#FixedIndexColor : 0,0,0,0
#FixedIndexColor : 1,255,255,255
/put your image names here
#PNGImages :
Left
Right
/Leave this alone
/Leave the next 4 lines alone
#GroupICE : gfx
#Palette : image_palette.png
#FixedIndexColor : 0,0,0,0
#FixedIndexColor : 1,255,255,255
/Put your image names here (same as above)
#PNGImages :
Left
Right
/name of your output app var (maximum of 8 characters)
#AppvarICE :HappyDoL
#AppvarICE :ExampleL
/This will be at the very beginning of the app var (add underscores to the end to make the whole header 16 chars long)
/Never change the FIRST 8 characters. The LAST 8 characters will be used as the image name in the program.
#OutputHeader : HDPICV2LHappyDog
#OutputHeader : HDPICV3LExample_
#OutputPalettes : gfx
/Image name of LEFT image
#PNGImages :
Left
/name of your output app var (maximum of 8 characters) (does not need to be the same as above)
#AppvarICE : HappyDoR
#AppvarICE : ExampleR
/This will be at the very beginning of the app var (add underscores to the end to make the whole header 16 chars long)
/Never change the FIRST 8 characters. The LAST 8 characters will be used as the image name in the program. (make sure it's the same as above)
#OutputHeader : HDPICV2RHappyDog
#OutputHeader : HDPICV3RExample_
#OutputPalettes : gfx
/image name of RIGHT image
#PNGImages :
Right
#AppvarICE : HappyDoP
#OutputHeader : HDPALV1BHappyDog
#AppvarICE : B1lueprP
#OutputHeader : HDPALV1BB1luepri
#OutputPalettes : gfx
#PNGImages :
image_palette.png
16 changes: 11 additions & 5 deletions ReadMe.md
Original file line number Diff line number Diff line change
@@ -1,5 +1,5 @@
# High-Definition Picture Viewer
*For the TI-84 Plus CE, TI-84 Plus CE -t, and TI-83 Premium CE*
*For the TI-84 Plus CE, TI-84 Plus CE -t, TI-83 Premium CE, and TI-83 Premium CE Edition Python*

By TheLastMillennial and the help of Peter "PT_" Tillema

Expand All @@ -9,8 +9,7 @@ By TheLastMillennial and the help of Peter "PT_" Tillema
- Send "HDPICV.8xp" and any converted image(s) to your calculator.
- Run the program on your calculator.
- Refer to this troubleshooting video if you encounter any issues: https://www.youtube.com/watch?v=-TweNnHuFCQ
- Use the arrow keys to select an image.
- Use [y=] and [graph] to scroll through pages of images
- Use the up and down arrow keys to select an image.
- Use [enter] to open an image
- Use [clear] to exit an image and to quit the program

Expand All @@ -21,12 +20,12 @@ By TheLastMillennial and the help of Peter "PT_" Tillema
- Turn the image into a .png
- Open the HDpicConverter folder
- Run HD Picture Converter CE.exe (Make sure you have Wine if you are NOT on Windows)
- Click 'Open File'
- Click 'Open Images'
- Navigate to, and select the image you want to convert
- Click 'Open'
- If an error occurs, read and report the output to TheLastMillennial on Cemetech.net
- If an error occurs, attempt Manual Conversion as shown below
- If no errors occur, click on 'Open Folder'
- If no errors occur, click on 'Open Converted Images'
- Send the converted .8xv files to your calculator

#### Manual Conversion:
Expand All @@ -48,6 +47,13 @@ By TheLastMillennial and the help of Peter "PT_" Tillema

## Changelog

### v4.0.208
- Resdesigned GUI completely.
- Improved image quality drastically.
- Included image converter application.
- Updated ReadMe.
- Updated example images.

### v4.0.101
- Added icon.
- Added description.
Expand Down
Binary file added Releases/Beta 3/HDpic.zip
Binary file not shown.
Binary file removed Uncompiled Displayers/HDPIC 4.0.174.8xp
Binary file not shown.
Binary file added Uncompiled Displayers/HDPIC 4.0.208.8xp
Binary file not shown.
140 changes: 92 additions & 48 deletions Uncompiled Displayers/Source.txt
Original file line number Diff line number Diff line change
Expand Up @@ -12,7 +12,7 @@
10->THUMBNAILX
20->THUMBNAILY
18->RECTX
18->RECTY
2->RECTY
1->SELECTEDPIC

" "->Str4
Expand All @@ -29,16 +29,16 @@ While KEY!=15
//detects images
Call DETECTALLPICS
//displays the thumbnails
Call DISPTHUMB
Call LOADTHUMB
//loads the selection GUI
Call SELECTOR
End
Goto STOP

Lbl DETECTALLPICS
det(0
det(18," Loading data...",60,1
det(18,"4.0.1xx DEV",230,1
//det(0
//det(18," Loading data...",60,1
//det(18,"4.0.2xx DEV",230,1
"HDPICV3L"->Str1
"HDPICV3R"->Str2
"HDPALV1B"->Str3
Expand All @@ -58,6 +58,16 @@ Alloc(256)->PALNAME

0->LPOS

det(0
SetColor(255
SetTextFGColor(0
SetTextBGColor(255
PrintStringXY("Loading, Images Found:",10,10
PrintStringXY("By: TheLastMillennial 2019 Version: 4.0.208",10,227




While Detect(^^oLPOS,Str1->LPIC
// Open the variable - we are sure it exists because it's detected
Open(LPIC,"r")->LPICSLOT
Expand Down Expand Up @@ -98,14 +108,9 @@ While Detect(^^oLPOS,Str1->LPIC
GetDataPtr(RPICSLOT)->L2(TOTALPICS
GetDataPtr(PALSLOT)->L3(TOTALPICS

det(0
L1(I*3)->LPIC
L2(I*3)->RPIC
L3(3)->PAL
det(5,0
det(4,PAL,512,0
Sprite_NoClip(LPIC,0,0)
Sprite_NoClip(RPIC,*{LPIC},0)
FillRectangle_NoClip(170,10,20,15
SetTextXY(170,10
PrintInt(TOTALPICS/3,2
//Pause
//"Test

Expand All @@ -131,7 +136,7 @@ Return


//displays thumbnails
Lbl DISPTHUMB
Lbl LOADTHUMB
det(0
//set up for text
//normal text size
Expand All @@ -148,7 +153,7 @@ End

//divides total pics by 3 to get the correct number of half-pictures detected
//TOTALPICS/3->SIMPLETOTAL
//initializes the I for the loop
//initializes the I for the loop, it's the starting point
1->I
//Loops until the screen has been filled with a max of 6 pictures (6>=I) or if there are no more pictures to display ((I*3)=<TOTALPICS)

Expand All @@ -159,55 +164,98 @@ SetColor(0
//makes a grey bar at the left of the screen, options will be shown there
FillRectangle_NoClip(0,0,120,240

//displays the images text name (the var 'I' was initialized above)
While 16>I and I*3<=TOTALPICS
Call DISPNAMES

Return

Lbl DISPNAMES
//clears current names
SetColor(0
FillRectangle_NoClip(0,0,120,240
SetTextFGColor(1
SetTextBGColor(0
//displays the images text name (the var 'I' was initialized above) the Y is for text positioning
0->Y
If I<1
1->I
End

While (15+I-Y)>=I and I*3<=TOTALPICS
{L4+I*3}->HEADERTEXT
//gets proper text position
20->TEXTX
5+15*I->TEXTY

4+15*Y->TEXTY
//prints out the image name
PrintStringXY(HEADERTEXT,TEXTX,TEXTY
I+1->I
Y+1->Y
End
// end of While loop
Return

Lbl DISPTHUMB
L1(SELECTEDPIC*3)->LPIC
L2(SELECTEDPIC*3)->RPIC
L3(SELECTEDPIC*3)->PAL
SetColor(0
Rectangle_NoClip(120,0,200,120
det(4,PAL,512,0
ScaleSprite(LPIC,THUMBNAIL
Sprite_NoClip(THUMBNAIL,120,45)
ScaleSprite(RPIC,THUMBNAIL
Sprite_NoClip(THUMBNAIL,120+*{THUMBNAIL},45)
Return

//sets palette to current selected pic palette
Lbl SETPALETTE
L3(SELECTEDPIC*3)->PAL
det(4,PAL,512,0
Return

//selection GUI
Lbl SELECTOR

dbd(0
//presets palette to
L3(SELECTEDPIC*3)->PAL
det(4,PAL,512,0

Call DISPTHUMB
While KEY!=15
getKey->KEY
If KEY!=0

//SetDraw(1
//sets color to black
SetColor(0
//clears the rectangular selector
Rectangle_NoClip(RECTX,RECTY,70,12)
//detecs if the up or down arrow keys are pressed and updates the y postition of cursor accordingly
If (SELECTEDPIC*3)<(TOTALPICS+3) and (SELECTEDPIC>0)
(((KEY=1) and (RECTY<227))-((KEY=4) and (RECTY>18)))->YPOS
//updates the rectangle coordinates
YPOS*15+RECTY->RECTY
If ((SELECTEDPIC*3)<TOTALPICS or ((SELECTEDPIC*3)=TOTALPICS and KEY=4)) and ((SELECTEDPIC>1) or (SELECTEDPIC=1 and KEY=1))
dbd(0
(KEY=1)-(KEY=4)->YPOS
//(((KEY=1) and (RECTY<227))-((KEY=4) and (RECTY>18)))->YPOS

//updates the picture selected
YPOS+SELECTEDPIC->SELECTEDPIC
//loads the thumbnail
L1(SELECTEDPIC*3)->LPIC
L2(SELECTEDPIC*3)->RPIC
L3(SELECTEDPIC*3)->PAL
det(4,PAL,512,0
ScaleSprite(LPIC,THUMBNAIL
Sprite_NoClip(THUMBNAIL,120,30)
ScaleSprite(RPIC,THUMBNAIL
Sprite_NoClip(THUMBNAIL,120+*{THUMBNAIL},30)

//updates the rectangle coordinates
YPOS*15+RECTY->RECTY
If RECTY>=227
227->RECTY
SELECTEDPIC-15->I
Call DISPNAMES
End
//checks if the box is at the top of the screen or is trying to move above top
If RECTY<=2 or I>500
2->RECTY
SELECTEDPIC-1->I
If I>500
1->I
End

Call DISPNAMES
End

//displays the thumbnail
Call DISPTHUMB
End

//SwapDraw
//sets color back to white
SetColor(1
//-------
Expand All @@ -229,19 +277,12 @@ While KEY!=15
//Broke
If (KEY=53 or KEY=2 or KEY=4) and SELECTEDPIC>1
SELECTEDPIC-1->SELECTEDPIC
If remainder(SELECTEPIC,6)=0 and PAGE>0
PAGE-1->PAGE
SELECTEDPIC+6->SELECTEDPIC
End


End
If (KEY=49 or KEY=3 or KEY=1) and SELECTEDPIC*3<TOTALPICS
SELECTEDPIC+1->SELECTEDPIC
//dbd(0)
If remainder(SELECTEPIC,6)=0 and (PAGE<(TOTALPICS/3)/6)
PAGE+1->PAGE
SELECTEDPIC-6->SELECTEDPIC
End

End
//displays the picture
If KEY
Expand All @@ -255,8 +296,10 @@ While KEY!=15
End
End
//restores selected pic so the selector will open the correct pic
ORIGSELECTED->SELECTEDPIC
//ORIGSELECTED->SELECTEDPIC
Call LOADTHUMB
Call DISPTHUMB

//det(3
//makes sure the program wont quit
0->KEY
Expand All @@ -266,6 +309,7 @@ While KEY!=15
//makes a grey bar at the left of the screen, options will be shown there
//FillRectangle(0,0,120,240
//------

End
//sets color to white
SetColor(1
Expand Down

0 comments on commit 5a1270d

Please sign in to comment.